home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2002 October
/
Chip_2002-10_cd1.bin
/
sharewar
/
hnet
/
hnetinfo.exe
/
{app}
/
HNetware
/
HInfoNetW.CSY
/
RCDATA
/
TPACKETGENERATORFORM
/
TPACKETGENERATORFORM.txt
< prev
Wrap
Text File
|
2002-07-03
|
5KB
|
265 lines
object PacketGeneratorForm: TPacketGeneratorForm
Left = 194
Top = 108
Width = 640
Height = 480
Caption = 'Packet gener�tor'
Color = clBtnFace
Constraints.MinHeight = 480
Constraints.MinWidth = 640
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
Icon.Data = {<image000.ico>}
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnDeactivate = FormDeactivate
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 632
Height = 121
Align = alTop
TabOrder = 0
object Label3: TLabel
Left = 24
Top = 58
Width = 28
Height = 13
Caption = 'Poslat:'
end
object Label4: TLabel
Left = 256
Top = 58
Width = 38
Height = 13
Caption = 'packet'
end
object Label5: TLabel
Left = 352
Top = 58
Width = 25
Height = 13
Caption = '�ekat:'
end
object Label6: TLabel
Left = 488
Top = 58
Width = 13
Height = 13
Caption = 'ms'
end
object Label7: TLabel
Left = 304
Top = 90
Width = 69
Height = 13
Caption = 'D�lka packetu:'
end
object Label8: TLabel
Left = 48
Top = 20
Width = 40
Height = 13
Caption = 'Adapt�r:'
end
object Label9: TLabel
Left = 488
Top = 90
Width = 25
Height = 13
Caption = 'bytes'
end
object RadioButton1: TRadioButton
Left = 64
Top = 56
Width = 89
Height = 17
Caption = 'Nastavit pevn� po�et:'
Checked = True
TabOrder = 0
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 64
Top = 72
Width = 81
Height = 25
Caption = 'Neomezen�'
TabOrder = 1
OnClick = RadioButton2Click
end
object SpinEdit1: TSpinEdit
Left = 160
Top = 56
Width = 89
Height = 22
MaxValue = 5000
MinValue = 1
TabOrder = 2
Value = 1
end
object SpinEdit2: TSpinEdit
Left = 384
Top = 56
Width = 97
Height = 22
MaxValue = 1000
MinValue = 1
TabOrder = 3
Value = 1
end
object BitBtn1: TBitBtn
Left = 528
Top = 64
Width = 40
Height = 33
TabOrder = 4
OnClick = BitBtn1Click
Kind = bkOK
end
object ComboBox1: TComboBox
Left = 120
Top = 16
Width = 417
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 5
end
object SpinEdit3: TSpinEdit
Left = 384
Top = 88
Width = 97
Height = 22
MaxValue = 1550
MinValue = 60
TabOrder = 6
Value = 60
end
object BitBtn2: TBitBtn
Left = 576
Top = 64
Width = 41
Height = 33
TabOrder = 7
Kind = bkClose
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 432
Width = 632
Height = 21
Panels = <
item
Text = 'Packet poslat:'
Width = 150
end
item
Text = 'S�ov� adapt�r:'
Width = 300
end
item
Text = 'Status:'
Width = 50
end>
SimplePanel = False
end
object GroupBox2: TGroupBox
Left = 0
Top = 121
Width = 632
Height = 239
Align = alClient
Caption = ' Packet '
TabOrder = 2
object Memo1: TMemo
Left = 2
Top = 15
Width = 430
Height = 222
Align = alClient
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
PopupMenu = PopupMenu1
ScrollBars = ssVertical
TabOrder = 0
OnChange = Memo1Change
end
object Memo2: TMemo
Left = 432
Top = 15
Width = 198
Height = 222
Align = alRight
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = [fsBold]
ParentFont = False
PopupMenu = PopupMenu1
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 1
end
end
object GroupBox3: TGroupBox
Left = 0
Top = 360
Width = 632
Height = 72
Align = alBottom
Caption = ' Progress '
TabOrder = 3
object Label1: TLabel
Left = 432
Top = 16
Width = 32
Height = 13
Caption = 'Label1'
end
object Label2: TLabel
Left = 432
Top = 40
Width = 32
Height = 13
Caption = 'Label2'
end
object ProgressBar1: TProgressBar
Left = 24
Top = 24
Width = 369
Height = 25
Min = 0
Max = 100
TabOrder = 0
end
end
object PopupMenu1: TPopupMenu
Left = 64
Top = 297
object Clear1: TMenuItem
Caption = 'Smazat'
OnClick = Clear1Click
end
end
end